home *** CD-ROM | disk | FTP | other *** search
/ BMUG PD-ROM A / PD-ROM A.iso / Programming / Programming Help / Swatch / String Magic 1.0 / FastStrings.r < prev    next >
Encoding:
Text File  |  1991-04-10  |  392 b   |  23 lines  |  [TEXT/MPS ]

  1.  
  2. type 'STR2'
  3. {
  4. IndexBound:
  5.     integer = $$Countof(StringList);        // Number of strings in resource
  6.     array [$$Word(indexBound)/16+1]
  7.     {
  8.         integer;    // Index value
  9.     };
  10.     array StringList
  11.     {
  12.         pstring;    // String value
  13.     };
  14. };
  15.  
  16. type 'STR3'
  17. {
  18.     integer = $$Countof(StringList);        // Number of strings in resource
  19.     array StringList    // Never more than 16 strings in list
  20.     {
  21.         pstring;        // String value
  22.     };
  23. };